home *** CD-ROM | disk | FTP | other *** search
- ; Install imageprocess.library
- ; $VER: Install-imageprocess.library V1.0 (20.8.2000)
- ; © 2000 Paul Huxham
-
- (set #catalog 0) ; english language is default
-
- ; Find the current language
- (set #i 0)
- (while (set #thisfile (select #i
- "english" "italiano" "deutsch" "español" "czech" "català" "dansk" "français"
- "hrvatski" "nederlands" "norsk" "polski" "português"
- "russian" "srpski" "suomi" "svenska" "ÃeÓtina"
- ""))
- (
- (if (= @language #thisfile)
- (
- (set #catalog #i)
- (set #catalogname #thisfile)
- )
- )
- (set #i (+ #i 1))
- )
- )
-
- ; Query user for their language, using system as default
- (set #catalog
- (askchoice
- (prompt "Select your native language (language for installer)")
- (help @askoptions-help)
- (choices "English" "Italiano" "Deutsch" "Español" "Czech")
- (default #catalog)
- )
- )
-
- ; Reset #catalogname as the user may have changed the language above
- (if (< #catalog 5)
- (
- (set #catalogname (select #catalog "english" "italiano" "deutsch" "español" "czech"))
- )
- )
-
- ; Some string defaults common for all languages
- (set #HOMEPAGE "http://mafeking.scouts.org.au/steeplesoftware")
- (set #BLANK "\n")
-
-
- ; ************************** English texts ******************************
- (set #INITIAL_MESSAGE
- (cat "\nWelcome to the imageprocess.library installer\n\n\n"
- "You can obtain updates and other information\nabout imageprocess.library from the homepage\n\n"
- #HOMEPAGE)
- )
- (set #WRONG_INSTALLER_VERSION "\n\n\n\nYou need at least version 42.9 of Installer\nto install imageprocess.library")
- (set #WRONG_CPU "\n\n\n\nYou need a 68020 CPU or better\nto use imageprocess.library")
- (set #WRONG_OS_VERSION "\n\n\n\nYou need at least AmigaOS V2.0\nto use imageprocess.library")
- (set #INSTALLING "\nInstalling")
- (set #PROMPT_INSTALL_PPC "Install PPC (WarpOS) version?")
- (set #INSTALL_WHICH_VERSION "\nInstall version for which CPU?")
- (set #UPDATES_AVAILABLE "\nYou can get the latest version\nof imageprocess.library from the homepage")
- (set #YES "Yes")
- (set #NO "No")
-
- ; ************************** Italiano texts *****************************
- (if (= #catalog 1)
- (
- (set #INITIAL_MESSAGE
- (cat "\nBenvenuto nell'installazione di imageprocess.library\n\n\n"
- "Puoi ottenere gli aggiornamenti, la mailing list e altre informazioni\nsu imageprocess.library alla homepage\n"
- #HOMEPAGE)
- )
- (set #WRONG_INSTALLER_VERSION "\n\n\n\nNecessiti almeno della versione 42.9 dell'Installer\nper installare imageprocess.library")
- (set #WRONG_CPU "\n\n\n\nNecessiti di una CPU 68020 o superiore\nper usare imageprocess.library")
- (set #WRONG_OS_VERSION "\n\n\n\nNecessiti almeno di AmigaOS V2.0\nper usare imageprocess.library")
- (set #INSTALLING "\nInstallazione")
- (set #INSTALL_WHICH_VERSION "\nInstall version for which CPU?")
- (set #UPDATES_AVAILABLE "\nAggiornamenti di imageprocess.library e le librarie richieste\n\nsono disponibili sulla home page")
- (set #YES "Sì")
- (set #NO "No")
- )
- )
-
- ; ************************** Deutsch texts ******************************
- (if (= #catalog 2)
- (
- (set #INITIAL_MESSAGE
- (cat "\nWillkommen zur Installation von imageprocess.library\n\n\n"
- "Updates, und weitere Information\nüber imageprocess.library gibt es auf der Homepage\n"
- #HOMEPAGE)
- )
- (set #WRONG_INSTALLER_VERSION "\n\n\n\nSie benötigen mind. Version 42.9 des Installers\num imageprocess.library zu installieren")
- (set #WRONG_CPU "\n\n\n\nSie benötigen einen 68020 oder höher\num imageprocess.library ausführen zu können")
- (set #WRONG_OS_VERSION "\n\n\n\nSie benötigen mind. AmigaOS V2.0\num imageprocess.library ausführen zu können")
- (set #INSTALLING "\nInstalliert")
- (set #INSTALL_WHICH_VERSION "\nInstall version for which CPU?")
- (set #UPDATES_AVAILABLE "\nUpdates für imageprocess.library und den dazugehörigen libraries\n\ngibt es auf der Homepage")
- (set #YES "Ja")
- (set #NO "Nein")
- )
- )
-
- ; ************************** Español texts ******************************
- (if (= #catalog 3)
- (
- (set #INITIAL_MESSAGE
- (cat "\nBienvenido a la instalación de imageprocess.library\n\n\n"
- "Podrás obtener actualizaciones, acceder a listas de correo y tener más información\nsobre imageprocess.library en la página web de Homepage\n"
- #HOMEPAGE)
- )
- (set #WRONG_INSTALLER_VERSION "\n\n\n\nNecesitas al menos la versión 42.9 del Installer\npara instalar imageprocess.library")
- (set #WRONG_CPU "\n\n\n\nNecesitas un 68020 o superior\npara utilizar imageprocess.library")
- (set #WRONG_OS_VERSION "\n\n\n\nNecesitas al menos AmigaOS V2.0\npara utilizar imageprocess.library")
- (set #INSTALLING "\nInstalando")
- (set #INSTALL_WHICH_VERSION "\nInstall version for which CPU?")
- (set #UPDATES_AVAILABLE "\nLas actualizaciones de imageprocess.library y librerías necesarias\n\nestán disponibles en la página web de homepage")
- (set #YES "Sí")
- (set #NO "No")
- )
- )
-
- ; ************************** Czech texts ******************************
- (if (= #catalog 4)
- (
- (set #INITIAL_MESSAGE
- (cat "\nVítejte pêi instalaci programu imageprocess.library!\n\n\n"
- "Dalîí informace, kontakt na ostatní uùivatele a aktualizace\nmûùete zdarma získat staùením z domovské stránky\n"
- #HOMEPAGE)
- )
- (set #WRONG_INSTALLER_VERSION "\n\n\n\nK instalaci programu imageprocess.library\npotêebujete Installer V42.9 nebo vyîîí")
- (set #WRONG_CPU "\n\n\n\nKe spuîtëní programu imageprocess.library\npotêebujete alespoñ CPU68020 nebo lepîí")
- (set #WRONG_OS_VERSION "\n\n\n\nProgram imageprocess.library vyùaduje\nke spuîtëní AmigaOS V2.0")
- (set #INSTALLING "\nInstalace")
- (set #INSTALL_WHICH_VERSION "\nInstall version for which CPU?")
- (set #UPDATES_AVAILABLE "\n\nAktualizace programu imageprocess.library a pêísluîných\n\nknihoven jsou dostupné z domovské stránky")
- (set #YES "Ano")
- (set #NO "Ne")
- )
- )
-
-
- ; ************************* Global procedures ***************************
- (procedure P_copylib lib destpath newlibname
- (
- (copylib
- (prompt (cat (cat #INSTALLING " ") (fileonly newlibname)))
- (help @copylib-help)
- (newname newlibname)
- (source lib)
- (dest destpath)
- (confirm)
- (optional askuser)
- )
- )
- )
-
-
- ; *********************** imageprocess.library install
-
- (if (< @installer-version (+ (* 65536 42) 9))
- (abort #WRONG_INSTALLER_VERSION)
- )
-
- (if (< (database "cpu") 68020 )
- (abort #WRONG_CPU)
- )
-
- (set os_version (/ (getversion "exec.library" (resident)) 65536))
- (if (< os_version 37)
- (abort #WRONG_OS_VERSION)
- )
-
- ; All essential version numbers are correct, continue installation
- (message #INITIAL_MESSAGE)
-
- (complete 0)
-
-
- ; *********************** Sort out what the user has where
-
- ; Establish CPU type
-
- (set #ourcpu (database "cpu"))
-
- (if (= #ourcpu "68020") (set #ourcpu 0))
- (if (= #ourcpu "68030") (set #ourcpu 0))
- (if (= #ourcpu "68040") (set #ourcpu 1))
- (if (= #ourcpu "68060") (set #ourcpu 2))
-
- (complete 0)
-
- ; *********************** Install imageprocess.library
-
- ; *********************** Is WarpOS installed
- (set #ppc 1) ; No PPC by default
-
- (set warpos_version 0)
- (set warpos_version (getversion "warpos.library" ))
- (if (> warpos_version 0)
- (
- (set #ppc 0)
-
- (set #ppc
- (askchoice
- (help @askchoice-help)
- (prompt #PROMPT_INSTALL_PPC)
- (choices #YES #NO)
- (default #ppc)
- )
- )
- )
- )
-
- (if (= #ppc 1)
- (set #cpu_install
- (askchoice
- (help @askchoice-help)
- (prompt #INSTALL_WHICH_VERSION)
- (choices "68020" "68040" "68060")
- (default #ourcpu)
- )
- )
- )
-
- (set @default-dest "Libs:")
-
- (if (= @user-level 2) ;If expert user, ask directory
- (
- (set @default-dest
- (askdir
- (prompt #SELECT_INSTALL_DIRECTORY)
- (help @askdir-help)
- (default @default-dest)
- )
- )
- )
- )
-
- (if (= #ppc 0)
- (
- ; PPC installed
- (P_copylib "libs/imageprocess.library_wos" @default-dest "imageprocess.library")
- )
- (
- (set #entry (select #cpu_install "020" "040" "060" ""))
- (set #entry (cat "libs/imageprocess.library_" #entry))
-
- (P_copylib #entry @default-dest "imageprocess.library")
- )
- )
-
- (complete 100)
-
- ; *********************** Finished installation
-
- (message (cat #UPDATES_AVAILABLE #BLANK #BLANK #HOMEPAGE))
-